home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / tool-inc.zip / QUELIB.INT < prev    next >
Text File  |  1989-06-02  |  257b  |  7 lines
  1. {$i \tinc\quelib.dcl}
  2. procedure init_que( var q: queue_rec);
  3. function empty_que( var q: queue_rec ): boolean;
  4. function que_free (var q: queue_rec): integer;
  5. procedure enque (var q: queue_rec; c: char);
  6. procedure deque (var q: queue_rec; var c: char);
  7.